CommonEvent 2663
Name = "誘惑：エグエル"

  999([2151])
  Script(["$game_troop.lose_event_id = 3663"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["eggel_fc1", 2, 0, 2])
  ShowText(["\\n<Eggiel>"])
  ShowText(["It seems the situation is unfavorable..."])
  ShowText(["Then, let's incapacitate with pleasure."])
  Script(["battler_graphic_hide"])
  ShowPicture([5, "ev_eggel_ha1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Luka's body was pulled into a giant egg!"])
  ShowText(["Bubbles overflowed, covering the entire body in foam!"])
  ShowTextAttributes(["eggel_fc1", 0, 0, 2])
  ShowText(["\\n<Eggiel>"])
  ShowText(["Those bubbles bring pleasure and ecstasy."])
  ShowText(["If you behave, you can taste paradise..."])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Struggle", "Submit"], 1])
  When([0, "もがく"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["However, Luka shook off the temptation and escaped from the restraints!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "なすがまま"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["eggel_fc1", 0, 0, 2])
  ShowText(["\\n<Eggiel>"])
  ShowText(["Hehe, have you given up on resisting?"])
  ShowText(["Then, please lose yourself in the foam..."])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Delicate bubbles wrapped around the entire body, slithering!"])
  ShowText(["A delightful sensation melts the mind away!\\D"])
  ShowText(["Luka took damage from \\V[26]!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The bubbles also wrapped around the penis, providing exquisite pleasure!"])
  ShowText(["The whole body is covered in slippery foam, experiencing sweet relaxation!\\D"])
  ShowText(["Luka took damage from \\V[26]!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The penis is enveloped in bubbles, exposed to melting pleasure!"])
  ShowText(["The mind melts sweetly, and the urge to cum rises!\\D"])
  ShowText(["Luka took damage from \\V[26]!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  Label(["射精1"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Fuh... ahhhhhh..."])
  CallCommonEvent([104])
  ShowPicture([5, "ev_eggel_ha2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["While immersed in ecstasy, I ended up cumming."])
  ShowText(["Inside the bubbles, I scattered my semen--"])
  ShowTextAttributes(["eggel_fc1", 0, 0, 2])
  ShowText(["\\n<Eggiel>"])
  ShowText(["Hehe, you've released quite a bit of semen, haven't you?"])
  ShowText(["That semen will also become nourishment for the egg..."])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
